
if (!file.exists("import_data/output")){ 
  dir.create("import_data/output")
}

source("import_data/01_stocks_import.R")
source("import_data/02_stocks_import_inst_ownership.R")
source("import_data/03_stocks_import_ibes.R")

flist <- list.files("import_data/output/", "^.+\\.RData$", full.names = TRUE)
file.copy(flist, "input/", overwrite = TRUE)
file.remove(flist)